home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Disc Station 14
/
Disc Station Vol 14.BIN
/
heart
/
bazaar
/
baz_14.ntc
next >
Wrap
Text File
|
1996-12-25
|
17KB
|
982 lines
;--------------------------------------------------------------------
; " DS Bazzar " Main Program ver 0.123
;--------------------------------------------------------------------
;âeâLâXâgâtâîü[âÇé╠É▌ÆΦ ---------------------------------------------
@wall ;æSëµû╩Å┴ïÄ
@mouse 0 ;â}âEâXâJü[â\âï OFF
@frmlay 1,(15,51),60,9,1 ;âüâbâZü[âWâEâCâôâhâDé╠ÆΦï`
@frmlay 2,(36,10),20,30,1 ;
@frmact 1 ;âüâbâZü[âWâEâCâôâhâDé╠æIæ≡
@frmclr 1 ;âüâbâZü[âWâEâCâôâhâDôαé≡Å┴ïÄé╖éΘ
@txtreset ;âeâLâXâgï@ö\Åëè·ë╗
@brank 0,1 ;ò╢ÄÜè╘üEìsè╘É▌ÆΦ
@scroll 0 ;ò╢ÄÜâXâNâìü[âïÉ▌ÆΦ
@txtsize 1,1 ;ò╢ÄÜâXâNâìü[âïÉ▌ÆΦ
@txtwait 0,0,0 ;ò╢ÄÜò\ĪâEâFâCâgÉ▌ÆΦ
@txtdco 1 ;ò╢ÄÜÅCÅⁿÄwÆΦ
;âLâââëâNâ^ü[é╠É▌ÆΦ -------------------------------------------------
@chrload bzz_kao.gcn,10,10 ;âLâââëâNâ^ü[âfü[â^é≡âTü[âtâFâXé╔âìü[âh
@chrset chrbg(0),0,0,0 ;âLâââëâNâ^ü[âAâjâüé≡ÆΦï`
@chrset chrbg(1),0,0,1
@chrset chrbg(2),0,0,2
@chrset chrbg(3),0,0,3
;âAâCâRâôé╠É▌ÆΦ -----------------------------------------------------
@iconload bzz_ico.gcn ;âAâCâRâôâfü[â^é≡âTü[âtâFâXé╔âìü[âh
@iconset iconchr0,1,0,0 ;âAâCâRâôâAâjâüé≡ÆΦï`
@iconset iconchr1,1,1,1
@iconset iconchr2,1,2,2
@iconset iconchr3,1,3,3
@iconset iconchr4,1,4,4
@iconset iconchr5,1,5,5
@iconset iconchr6,1,6,6
@iconset iconchr7,1,7,7
@iconset iconchr8,1,8,8
@iconset iconchr9,1,9,9
@iconset iconchr10,1,10,10
@iconset iconchr11,1,11,11
@iconset iconchr12,1,12,12
$flag0 = 0
$flag1 = 0
$flag2 = 0
;@sndload nokone.mlk
@pcmload nokone.wlk ;érédâtâ@âCâïé≡âìü[âhé╖éΘ
@effect 2,255,8 ;êΩÆUæSâpâîâbâgé≡ìòé╔É▌ÆΦé╖éΘ
@wait 5
@gra bzz_tit.gcn,(0,0),0
@effect 2,255,10
@keywait
@pcm 1
;âüâCâôüEâXâ^ü[âg -------------------------------------------------
:main_start
@effect 2,255,8
@clr (0,0),80,60,0
@wait 10
@snd 2
:end
@mouse 0
@gra bzz_main.gcn,(0,0),0
@gra bzz_scr.gcn,(18,0),0
@effect 2,255,10
;âüâCâôüEâïü[âv -------------------------------------------------
:main_loop
@gra bzz_scr.gcn,(18,0),0
;@print $rrr
@iconput iconchr0,(74,1) ;âAâCâRâôé≡ò\Ī
@iconjump :program_end
@if $flag0 != 0 :main_lp00
;û`ô¬é╠ë╚öÆ ---------------------------------------------------------
@txtwait 1,1,1 ;ò╢ÄÜò\ĪâEâFâCâgÉ▌ÆΦ
@txtdco 3 ;ò╢ÄÜÅCÅⁿÄwÆΦ
;@locate (0,1)
@wait 10
@chrput chrbg(1),(0,50),1 ;âJâ`âàâA ò\Ī
écérâoâUü[âïé╠ÉóèEé╓éµéñé▒é╗üI
@keywait
éφé╜é╡é═é▒é╠ÉóèEé╠ê─ôαÉlüAû╝é≡ âJâ`âàâA é╞éóéóé▄é╖üB
@keywait
ìíô·é═üAé▒é▒é┼é╠É╢èêé≡é╜é┴é╒éΦé╞èyé╡é±é┼éóé┴é─é¡é╛é│éóé╦üB
@keywait
@frmclr 1
üuécérâoâUü[âïüvéαìíë±é┼éQë±û┌é╠îfì┌é╞é╚éΦé▄é╖é¬üAé═é╢é▀é─
é╠ò√éαéóéτé┴é╡éßéΘé┼é╡éσéñé⌐éτüAé▒é╠ÉóèEé¬é╟é±é╚é╞é▒éδé┼éá
éΘé╠é⌐üAé⌐é±é╜é±é╔Éαû╛é╡é▄é╡éσéñüB
@keywait
@frmclr 1
é▒é╠ÉóèEé≡é╨é╞é▒é╞é┼î╛é┴é─é╡é▄éªé╬üA
üuâ~âjâQü[âÇé¬ùVé╫éΘüvÅΩÅèé┼é╖üB
@keywait
@frmclr 1
é▒é╠ÉóèEé┼é═ûêìåüAżïKû═é╚â~âjâQü[âÇé¬ë╜û{é⌐Ä√ÿ^é│éΩé▄é╖üB
é╗é╡é─éáé╚é╜é═é▒é╠ÉóèEé≡Æ╩é╡é─é╗é╠â~âjâQü[âÇé≡âvâîâCé┼é½
éΘé╠é┼é╖üB
@keywait
@frmclr 1
ìíîπé═ëµû╩Åπé╠âAâCâRâôé≡âNâèâbâNé╖éΘé▒é╞é┼Éiìsé╡é─éóé½é▄é╖üB
@keywait
éóéδéóéδé╚âRü[âiü[é¬éáéΘé╠é┼î⌐é─é▌é─é╦üB
@keywait
@frmclr 1
é┼é═üAéΣé┴é¡éΦé╞é¿èyé╡é▌é¡é╛é│éóücüB
@keywait
@frmclr 1
@chrput chrbg(0),(0,50),1 ;âJâ`âàâA Å┴ïÄ
$flag0 = 1
@txtwait 0,0,0 ;ò╢ÄÜò\ĪâEâFâCâgÉ▌ÆΦ
@txtdco 0 ;ò╢ÄÜÅCÅⁿÄwÆΦ
:main_lp00
@iconput iconchr1,(20,17) ;âAâCâRâôé≡ò\Ī
@comment (2,0),1,ìíë±é═üAéQû{é╠â~âjâQü[âÇ é¬Ä√ÿ^é│éΩé─éóé▄é╖üB
@iconjump :game_start
@iconput iconchr3,(48,27) ;âAâCâRâôé≡ò\Ī
@comment (2,0),1,èJö¡âXâ^âbâté╠ öMéóâüâbâZü[âWé¬üI âüâôâoü[éαæ¥éªé╜éµüB
@iconjump :staff_start
@if $flag2 != 0 :j_icon0
@iconput iconchr2,(23,43) ;âAâCâRâôé≡ò\Ī
@comment (2,0),1,ìíìåé┼é═ÉVé╡éóôWèJé¬ücüHüI
@iconjump :otayori_start
@goto :j_icon1
:j_icon0
@iconput iconchr2,(23,43) ;âAâCâRâôé≡ò\Ī
@comment (2,0),1,é¿é╜éµéΦâRü[âiü[æµéQë±üBâXâRâgâëòσÅWéαéáéΦé▄é╖üB
@iconjump :otayori_start
:j_icon1
@mouse 1
:program_loop
@goto :program_loop
;@wait 10
;@iconclr finish_1
;@frmclr 1
;@clr (0,0),80,60,2
;@wait 10
;@sndfade 5
;â~âjâQü[âÇ éΓéΘ -----------------------------------
:game_start
@pcm 1
@iconclr iconchr1
@iconclr iconchr2
@iconclr iconchr3
@gra bzz_w0.gcn,(20,5),2
@iconput iconchr4,(22,13) ;âAâCâRâôé≡ò\Ī
@comment (2,0),1,üué╜é╩âLâbâY éqé`ébédüv
@iconjump :tanuki_start ;é╜é╩âLâbâY
@iconput iconchr5,(22,20) ;âAâCâRâôé≡ò\Ī
@comment (2,0),1,üué╒éµé▄é±ÉHéñ âJü[âoâôâNâïüv
@iconjump :puyoman_start ;é╒éµé▄é±
@iconput iconchr6,(22,31) ;âAâCâRâôé≡ò\Ī
@comment (2,0),1,âüâCâôëµû╩é╔û▀éΦé▄é╖üB
@iconjump :exit_win00 ;âüâCâô
;@keywait
:win_loop00
@goto :win_loop00
:exit_win00
@iconclr iconchr4
@iconclr iconchr5
@iconclr iconchr6
@goto :main_loop
;âXâ^âbâté⌐éτé╠ é╨é╞é▒é╞-----------------------------------
:staff_start
@pcm 1
@iconclr iconchr1
@iconclr iconchr2
@iconclr iconchr3
;é¿éΓé╢é╞é╠ë∩ÿb üiêΩë±é╠é▌üj-------------------------------
@if $flag1 != 0 :staff_start_main
@txtwait 1,1,1 ;ò╢ÄÜò\ĪâEâFâCâgÉ▌ÆΦ
@txtdco 3 ;ò╢ÄÜÅCÅⁿÄwÆΦ
@chrput chrbg(2),(0,50),1 ;é¿éΓé╢ ò\Ī
éµéñüI âJâ`âàâAé╢éßé╦éªé⌐üI
@keywait
@frmclr 1
@chrput chrbg(1),(0,50),1 ;âJâ`âàâA ò\Ī
é▒é±é╔é┐é═üAânâôâXüB
@keywait
@frmclr 1
@chrput chrbg(2),(0,50),1 ;é¿éΓé╢ ò\Ī
üuécérâoâUü[âïüvé≡ɺì∞é╡é╜âXâ^âbâté⌐éτüAöMéóâüâbâZü[âWé¬
é╞é╟éóé─éΘé║üB
é╟éñé╛éóüAé▌é─éóé⌐é╦éªé⌐üB
@keywait
@frmclr 1
@chrput chrbg(1),(0,50),1 ;âJâ`âàâA ò\Ī
éáéΦé¬é╞éñüBé╗éñé│é╣é─éαéτéñéφüB
@keywait
@frmclr 1
@chrput chrbg(0),(0,50),1 ;âLâââë Å┴ïÄ
$flag1 = 1
@txtwait 0,0,0 ;ò╢ÄÜò\ĪâEâFâCâgÉ▌ÆΦ
@txtdco 0 ;ò╢ÄÜÅCÅⁿÄwÆΦ
;----------------------------------------------------------
:staff_start_main
@gra bzz_w1.gcn,(35,10),2
@iconput iconchr9,(36,17)
@iconjump :staff_1 ;é¡é┌é╜
@iconput iconchr12,(38,21)
@iconjump :staff_2 ;é¿éΩ
@iconput iconchr10,(40,25)
@iconjump :staff_3 ;òù
@iconput iconchr11,(38,29)
@iconjump :staff_4 ;éléüéôéï
@iconput iconchr3,(36,33)
@iconjump :staff_5 ;é▄é┴é½ü[
@iconput iconchr6,(38,39) ;âAâCâRâôé≡ò\Ī
@comment (2,0),1,âüâCâôëµû╩é╔û▀éΦé▄é╖üB
@iconjump :exit_win03 ;âüâCâô
;@keywait
:win_loop03
@goto :win_loop03
:exit_win03
@iconclr iconchr9
@iconclr iconchr12
@iconclr iconchr10
@iconclr iconchr11
@iconclr iconchr3
@iconclr iconchr6
@goto :main_loop
;é¿é╜éµéΦâRü[âiü[ -----------------------------------
:otayori_start
@pcm 1
@iconclr iconchr1
@iconclr iconchr2
@iconclr iconchr3
@gra bzz_scr2.gcn,(18,0),2
@txtwait 1,1,1 ;ò╢ÄÜò\ĪâEâFâCâgÉ▌ÆΦ
@txtdco 3 ;ò╢ÄÜÅCÅⁿÄwÆΦ
@if $flag2 == 0 :mon_talk
;âéâjü[âké╞é╠ë∩ÿb üiÆ╩Åφüj ------------------------------------
@chrput chrbg(3),(0,50),1 ;âéâjü[âk ò\Ī
é▄é╜ë∩é┴é╜éφé╦üB
@keywait
@frmclr 1
@chrput chrbg(0),(0,50),1 ;âéâjü[âk Å┴ïÄ
@goto :otayori_start_main
;âéâjü[âké╞é╠ë∩ÿb üiô┴ÄΩüj ------------------------------------
:mon_talk
@chrput chrbg(1),(0,50),1 ;âJâ`âàâA ò\Ī
é▒é╠ò╙é┼é═î⌐é⌐é»é╚éóÄqé╛éφüB
@keywait
@frmclr 1
@chrput chrbg(3),(0,50),1 ;âéâjü[âk ò\Ī
é═é╢é▀é▄é╡é─üBé▒é╠ôyÆné╔ùêé─üAÅëé▀é─Åoë∩é┴é╜û║üB
Ääé╠û╝é═âéâjü[âké╞éóéóé▄é╖üB
@keywait
@frmclr 1
@chrput chrbg(1),(0,50),1 ;âJâ`âàâA ò\Ī
é═é╢é▀é▄é╡é─üAâéâjü[âküB
Ääé╠û╝é═âJâ`âàâAüB
é▒é╠ôyÆné╔ùêé╜üAé╞éóéñé▒é╞é═èOé╠ìæé╠Élé╦üB
@keywait
@frmclr 1
@chrput chrbg(3),(0,50),1 ;âéâjü[âk ò\Ī
éªéªüBèOé╠ìæé⌐éτé╜é¡é│é±é╠é¿ò╓éΦé≡ë^é±é┼é½é╜é╠üB
é╟éñüAî⌐é─éóé¡üH
@keywait
@frmclr 1
@chrput chrbg(1),(0,50),1 ;âJâ`âàâA ò\Ī
éáéΦé¬é╞éñüBé╗éñé│é╣é─éαéτéñéφüB
@keywait
@frmclr 1
@chrput chrbg(0),(0,50),1 ;âLâââë Å┴ïÄ
$flag2 = 1
;----------------------------------------------------------
:otayori_start_main
@txtwait 0,0,0 ;ò╢ÄÜò\ĪâEâFâCâgÉ▌ÆΦ
@txtdco 0 ;ò╢ÄÜÅCÅⁿÄwÆΦ
@gra bzz_w3.gcn,(39,15),0
@iconput iconchr7,(41,28)
@comment (2,0),1,é¿é